unit UGameScreen;

interface

type
 TGameScreen = class(TObject)
  private

  public
   constructor create;
   procedure addTile(x, y: Integer; tile: TGameTile);
   procedure addObject(tile: TGameTile; ob: TGameObject);
   procedure showMap(map: TGameMap);
   procedure deleteTile(x, y: Integer);
   procedure deleteObject(x, y: Integer);
 end;

implementation

{ TGameScreen }

procedure TGameScreen.addObject(tile: TGameTile; ob: TGameObject);
begin
 //
end;

procedure TGameScreen.addTile(x, y: Integer; tile: TGameTile);
begin
 //
end;

constructor TGameScreen.create;
begin
 //
end;

procedure TGameScreen.deleteObject(x, y: Integer);
begin
 //
end;

procedure TGameScreen.deleteTile(x, y: Integer);
begin
 //
end;

procedure TGameScreen.showMap(map: TGameMap);
begin
 //
end;

end.
